﻿Imports System.Configuration

''' <summary>
''' 環境
''' </summary>
''' <remarks></remarks>
Public Class EnvironmentElement
    Inherits ConfigurationSection

    ''' <summary>
    ''' 名前
    ''' </summary>
    <ConfigurationProperty("name", IsKey:=True)>
    Public Property Name() As String
        Get
            Return DirectCast(Me("name"), String)
        End Get
        Set(ByVal value As String)
            Me("name") = value
        End Set
    End Property

    ''' <summary>
    ''' 環境リスト
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    <ConfigurationProperty("settings", IsRequired:=True)>
    Public ReadOnly Property settings() As SettingCollection
        Get
            Dim lst As SettingCollection = DirectCast(Me("settings"), SettingCollection)
            Return lst
        End Get
    End Property
End Class
